﻿Imports System.Data.SqlTypes

Namespace CoverFlow
    Friend Class ImageInfo
        Private m_Path As SqlBinary
        Private m_Host As String
        Public Sub New(host__1 As String, path__2 As SqlBinary)
            Host = host__1
            Path = path__2
        End Sub
        Public Property Host() As String
            Get
                Return m_Host
            End Get
            Private Set(value As String)
                m_Host = value
            End Set
        End Property

        Public Property Path() As SqlBinary
            Get
                Return m_Path
            End Get
            Private Set(value As SqlBinary)
                m_Path = value
            End Set
        End Property

    End Class
End Namespace
